home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / mint / shells / sh03src.zoo / sh-pl03 / sh / sh03diffs < prev    next >
Encoding:
Text File  |  1993-06-06  |  32.9 KB  |  1,296 lines
  1. diff --context --recursive --new-file bsd-sh/Makefile sh03/Makefile
  2. *** bsd-sh/Makefile    Fri Feb 19 08:41:42 1993
  3. --- sh03/Makefile    Wed Jun  2 01:22:16 1993
  4. ***************
  5. *** 1,46 ****
  6.   #    %W% (Berkeley) %G%
  7.   
  8.   PROG=    sh
  9. ! SRCS=    builtins.c cd.c dirent.c echo.c error.c eval.c exec.c expand.c \
  10.       input.c jobs.c mail.c main.c memalloc.c miscbltin.c \
  11.       mystring.c nodes.c options.c parser.c redir.c show.c signames.c \
  12.       syntax.c trap.c output.c var.c
  13. ! OBJS+=    init.o
  14. ! CFLAGS+=-DSHELL -I. -I${.CURDIR}
  15. ! .PATH:    ${.CURDIR}/bltin
  16. ! CLEANFILES+=\
  17. !     builtins.c builtins.h init.c mkinit mknodes mksignames mksyntax \
  18. !     nodes.c nodes.h signames.c signames.h syntax.c syntax.h token.def
  19.   
  20. ! .depend parser.o: token.def
  21.   token.def: mktokens
  22. !     sh ${.CURDIR}/mktokens
  23.   
  24. ! builtins.h builtins.c: ${.CURDIR}/mkbuiltins ${.CURDIR}/builtins
  25. !     cd ${.CURDIR}; sh mkbuiltins
  26.   
  27. ! init.c: mkinit ${SRCS}
  28. !     ./mkinit '${CC} -c ${CFLAGS} init.c' ${.ALLSRC}
  29.   
  30. ! mkinit: ${.CURDIR}/mkinit.c
  31. !     ${CC} ${CFLAGS} ${.CURDIR}/mkinit.c -o $@
  32.   
  33. ! nodes.c nodes.h: mknodes ${.CURDIR}/nodetypes ${.CURDIR}/nodes.c.pat
  34. !     ./mknodes ${.CURDIR}/nodetypes ${.CURDIR}/nodes.c.pat
  35.   
  36. ! mknodes: ${.CURDIR}/mknodes.c
  37. !     ${CC} ${CFLAGS} ${.CURDIR}/mknodes.c -o $@
  38.   
  39.   signames.c signames.h: mksignames
  40.       ./mksignames
  41.   
  42. ! mksignames: ${.CURDIR}/mksignames.c
  43. !     ${CC} ${CFLAGS} ${.CURDIR}/mksignames.c -o $@
  44.   
  45.   syntax.c syntax.h: mksyntax
  46.       ./mksyntax
  47.   
  48. ! mksyntax: ${.CURDIR}/mksyntax.c ${.CURDIR}/parser.h
  49. !     ${CC} ${CFLAGS} ${.CURDIR}/mksyntax.c -o $@
  50.   
  51. ! .include <bsd.prog.mk>
  52. --- 1,123 ----
  53.   #    %W% (Berkeley) %G%
  54.   
  55. + # Makefile for Kenneth Almquist's Bourne Shell for Atari ST/MiNT
  56. + # hohmuth 21 Mar 1993
  57. + # 
  58. + # This Makefile needs GNU Make.
  59. + 
  60.   PROG=    sh
  61. ! SRCS=    builtins.c cd.c dirent.c bltin/echo.c error.c eval.c exec.c expand.c \
  62.       input.c jobs.c mail.c main.c memalloc.c miscbltin.c \
  63.       mystring.c nodes.c options.c parser.c redir.c show.c signames.c \
  64.       syntax.c trap.c output.c var.c
  65. ! OBJS=    $(patsubst %.c,%.o,$(SRCS)) init.o
  66. ! 
  67. ! 
  68. ! CC=    gcc $(MODEL) -O2 -fomit-frame-pointer -fstrength-reduce
  69. ! CFLAGS=    -I. -Ibltin $(DEFS)
  70. ! 
  71. ! MODEL=    -mbaserel
  72. ! DEFS=    -DDOSFS -DSHELL -DENOTDIR=EPATH
  73. ! 
  74. ! POSTPROC1=    toglclr -fload -fram -frun
  75. ! 
  76. ! all:    $(PROG)
  77. ! 
  78. ! $(PROG): $(OBJS)
  79. !     $(CC) -o $@ $^ -lbiio
  80. ! ifdef POSTPROC1
  81. !     $(POSTPROC1) $@
  82. ! endif
  83. ! 
  84. ! %.o:    %.c
  85. !     $(CC) $(CFLAGS) -o $@ -c $<
  86.   
  87. ! parser.o: token.def
  88.   token.def: mktokens
  89. !     /bin/sh mktokens
  90.   
  91. ! builtins.h builtins.c: mkbuiltins builtins
  92. !     /bin/sh mkbuiltins
  93.   
  94. ! init.o: mkinit ${SRCS}
  95. !     ./mkinit '${CC} -c ${CFLAGS} init.c' ${SRCS}
  96.   
  97. ! mkinit: mkinit.c
  98. !     ${CC} ${CFLAGS} mkinit.c -o $@
  99.   
  100. ! nodes.c nodes.h: mknodes nodetypes nodes.c.pat
  101. !     ./mknodes nodetypes nodes.c.pat
  102.   
  103. ! mknodes: mknodes.c
  104. !     ${CC} ${CFLAGS} mknodes.c -o $@
  105.   
  106.   signames.c signames.h: mksignames
  107.       ./mksignames
  108.   
  109. ! mksignames: mksignames.c
  110. !     ${CC} ${CFLAGS} mksignames.c -o $@
  111.   
  112.   syntax.c syntax.h: mksyntax
  113.       ./mksyntax
  114.   
  115. ! mksyntax: mksyntax.c parser.h
  116. !     ${CC} ${CFLAGS} mksyntax.c -o $@
  117.   
  118. ! .PHONY: clean
  119. ! clean:
  120. !     -rm -f ${OBJS}
  121. ! 
  122. ! .PHONY: realclean
  123. ! realclean: clean
  124. !     -rm -f mksyntax syntax.c syntax.h
  125. !     -rm -f mksignames signames.c signames.h
  126. !     -rm -f mknodes nodes.c nodes.h
  127. !     -rm -f mkinit init.c
  128. !     -rm -f builtins.c builtins.h
  129. !     -rm -f token.def
  130. !     -rm -f ${PROG}
  131. ! 
  132. ! ### dependencies
  133. ! 
  134. ! builtins: ;
  135. ! 
  136. ! builtins.o : builtins.c shell.h builtins.h 
  137. ! cd.o : cd.c shell.h var.h nodes.h jobs.h options.h output.h memalloc.h error.h \
  138. !   mystring.h 
  139. ! dirent.o : dirent.c shell.h 
  140. ! error.o : error.c shell.h main.h options.h output.h error.h
  141. ! mksyntax.o : mksyntax.c parser.h 
  142. ! eval.o : eval.c shell.h nodes.h syntax.h expand.h parser.h jobs.h eval.h builtins.h \
  143. !   options.h exec.h redir.h input.h output.h trap.h var.h memalloc.h error.h mystring.h 
  144. ! exec.o : exec.c shell.h main.h nodes.h parser.h redir.h eval.h exec.h builtins.h \
  145. !   var.h options.h input.h output.h syntax.h memalloc.h error.h init.h mystring.h 
  146. ! expand.o : expand.c shell.h main.h nodes.h eval.h expand.h syntax.h parser.h \
  147. !   jobs.h options.h var.h input.h output.h memalloc.h error.h mystring.h 
  148. ! input.o : input.c shell.h syntax.h input.h output.h memalloc.h error.h 
  149. ! mksignames.o : mksignames.c 
  150. ! jobs.o : jobs.c shell.h main.h parser.h nodes.h jobs.h \
  151. !   options.h trap.h signames.h syntax.h input.h output.h memalloc.h error.h mystring.h 
  152. ! mail.o : mail.c shell.h exec.h var.h output.h memalloc.h error.h 
  153. ! main.o : main.c shell.h main.h mail.h options.h output.h parser.h nodes.h eval.h \
  154. !   jobs.h input.h trap.h memalloc.h error.h init.h mystring.h 
  155. ! memalloc.o : memalloc.c shell.h output.h memalloc.h error.h machdep.h mystring.h 
  156. ! miscbltin.o : miscbltin.c shell.h options.h var.h output.h memalloc.h error.h \
  157. !   mystring.h 
  158. ! mystring.o : mystring.c shell.h syntax.h error.h mystring.h 
  159. ! nodes.o : nodes.c shell.h nodes.h memalloc.h machdep.h mystring.h 
  160. ! options.o : options.c shell.h options.h nodes.h eval.h jobs.h input.h output.h \
  161. !   trap.h var.h memalloc.h error.h mystring.h 
  162. ! parser.o : parser.c shell.h parser.h nodes.h expand.h redir.h syntax.h options.h \
  163. !   input.h output.h var.h error.h memalloc.h mystring.h token.def 
  164. ! redir.o : redir.c shell.h nodes.h jobs.h expand.h redir.h output.h memalloc.h \
  165. !   error.h 
  166. ! show.o : show.c shell.h parser.h nodes.h mystring.h 
  167. ! signames.o : signames.c shell.h 
  168. ! syntax.o : syntax.c shell.h syntax.h 
  169. ! trap.o : trap.c shell.h main.h nodes.h eval.h jobs.h options.h syntax.h signames.h \
  170. !   output.h memalloc.h error.h trap.h mystring.h 
  171. ! output.o : output.c shell.h syntax.h output.h memalloc.h error.h
  172. ! var.o : var.c shell.h output.h expand.h nodes.h eval.h exec.h syntax.h options.h \
  173. !   mail.h var.h memalloc.h error.h mystring.h 
  174. ! init.o : shell.h mystring.h eval.h input.h error.h options.h redir.h \
  175. !   signames.h trap.h output.h memalloc.h var.h 
  176. diff --context --recursive --new-file bsd-sh/builtins sh03/builtins
  177. *** bsd-sh/builtins    Fri Feb 19 08:41:56 1993
  178. --- sh03/builtins    Sat May 22 00:41:42 1993
  179. ***************
  180. *** 61,66 ****
  181. --- 61,67 ----
  182.   exitcmd        exit
  183.   exportcmd    export readonly
  184.   #exprcmd    expr test [
  185. + falsecmd    false
  186.   fgcmd -j    fg
  187.   getoptscmd    getopts
  188.   hashcmd        hash
  189. diff --context --recursive --new-file bsd-sh/cd.c sh03/cd.c
  190. *** bsd-sh/cd.c    Fri Feb 19 08:42:02 1993
  191. --- sh03/cd.c    Sun Mar 21 14:49:26 1993
  192. ***************
  193. *** 187,193 ****
  194.               i += strlen(cdcomppath);
  195.           p = stalloc(i);
  196.           if (readlink(symlink, p, (int)statb.st_size) < 0) {
  197. !             error("readlink %s failed", stackblock());
  198.           }
  199.           if (cdcomppath != NULL) {
  200.               p[(int)statb.st_size] = '/';
  201. --- 187,193 ----
  202.               i += strlen(cdcomppath);
  203.           p = stalloc(i);
  204.           if (readlink(symlink, p, (int)statb.st_size) < 0) {
  205. !             error("readlink %s failed", symlink);
  206.           }
  207.           if (cdcomppath != NULL) {
  208.               p[(int)statb.st_size] = '/';
  209. ***************
  210. *** 343,349 ****
  211.               close(pip[1]);
  212.           }
  213.           execl("/bin/pwd", "pwd", (char *)0);
  214. !         error("Cannot exec /bin/pwd");
  215.       }
  216.       close(pip[1]);
  217.       pip[1] = -1;
  218. --- 343,350 ----
  219.               close(pip[1]);
  220.           }
  221.           execl("/bin/pwd", "pwd", (char *)0);
  222. ! /*        error("Cannot exec /bin/pwd");    */    
  223. !         exitshell(-1);
  224.       }
  225.       close(pip[1]);
  226.       pip[1] = -1;
  227. ***************
  228. *** 358,366 ****
  229. --- 359,374 ----
  230.       status = waitforjob(jp);
  231.       if (status != 0)
  232.           error((char *)0);
  233. + #ifdef __MINT__
  234. +     if (i < 0 || p == buf || !( p[-1] == '\n' || p[-1] == '\r'))
  235. +         error("pwd command failed");
  236. +     while (--p, (*p == '\n' || *p == '\r'))
  237. +         *p = 0;
  238. + #else
  239.       if (i < 0 || p == buf || p[-1] != '\n')
  240.           error("pwd command failed");
  241.       p[-1] = '\0';
  242. + #endif
  243.       curdir = savestr(buf);
  244.       INTON;
  245.   }
  246. diff --context --recursive --new-file bsd-sh/error.c sh03/error.c
  247. *** bsd-sh/error.c    Fri Feb 19 08:42:26 1993
  248. --- sh03/error.c    Sun Mar 21 14:56:00 1993
  249. ***************
  250. *** 179,195 ****
  251.   STATIC const struct errname errormsg[] = {
  252.       EINTR, ALL,    "interrupted",
  253.       EACCES, ALL,    "permission denied",
  254.       EIO, ALL,        "I/O error",
  255.       ENOENT, E_OPEN,    "no such file",
  256.       ENOENT, E_CREAT,    "directory nonexistent",
  257.       ENOENT, E_EXEC,    "not found",
  258.       ENOTDIR, E_OPEN,    "no such file",
  259.       ENOTDIR, E_CREAT,    "directory nonexistent",
  260.       ENOTDIR, E_EXEC,    "not found",
  261.       EISDIR, ALL,    "is a directory",
  262. ! /*    EMFILE, ALL,    "too many open files", */
  263.       ENFILE, ALL,    "file table overflow",
  264.       ENOSPC, ALL,    "file system full",
  265.   #ifdef EDQUOT
  266.       EDQUOT, ALL,    "disk quota exceeded",
  267.   #endif
  268. --- 179,205 ----
  269.   STATIC const struct errname errormsg[] = {
  270.       EINTR, ALL,    "interrupted",
  271.       EACCES, ALL,    "permission denied",
  272. + #ifdef EIO
  273.       EIO, ALL,        "I/O error",
  274. + #endif
  275.       ENOENT, E_OPEN,    "no such file",
  276.       ENOENT, E_CREAT,    "directory nonexistent",
  277.       ENOENT, E_EXEC,    "not found",
  278.       ENOTDIR, E_OPEN,    "no such file",
  279.       ENOTDIR, E_CREAT,    "directory nonexistent",
  280.       ENOTDIR, E_EXEC,    "not found",
  281. + #ifdef EISDIR
  282.       EISDIR, ALL,    "is a directory",
  283. ! #endif
  284. ! #ifdef EMFILE 
  285. !     EMFILE, ALL,    "too many open files",
  286. ! #endif
  287. ! #ifdef ENFILE
  288.       ENFILE, ALL,    "file table overflow",
  289. + #endif
  290. + #ifdef ENOSPC
  291.       ENOSPC, ALL,    "file system full",
  292. + #endif
  293.   #ifdef EDQUOT
  294.       EDQUOT, ALL,    "disk quota exceeded",
  295.   #endif
  296. ***************
  297. *** 198,204 ****
  298. --- 208,216 ----
  299.   #endif
  300.       ENXIO, ALL,    "no such device or address",
  301.       EROFS, ALL,    "read-only file system",
  302. + #ifdef ETXTBSY
  303.       ETXTBSY, ALL,    "text busy",
  304. + #endif
  305.   #ifdef SYSV
  306.       EAGAIN, E_EXEC,    "not enough memory",
  307.   #endif
  308. ***************
  309. *** 221,227 ****
  310. --- 233,241 ----
  311.   #ifdef ELOOP
  312.       ELOOP, ALL,    "symbolic link loop",
  313.   #endif
  314. + #ifdef E2BIG
  315.       E2BIG, E_EXEC,    "argument list too long",
  316. + #endif
  317.   #ifdef ELIBACC
  318.       ELIBACC, E_EXEC,    "shared library missing",
  319.   #endif
  320. ***************
  321. *** 240,245 ****
  322. --- 254,263 ----
  323.       struct errname const *ep;
  324.       static char buf[12];
  325.   
  326. + #ifdef __MINT__
  327. +     if (e < 32) 
  328. +         return "I/O error";
  329. + #endif
  330.       for (ep = errormsg ; ep->errcode ; ep++) {
  331.           if (ep->errcode == e && (ep->action & action) != 0)
  332.               return ep->msg;
  333. diff --context --recursive --new-file bsd-sh/error.h sh03/error.h
  334. *** bsd-sh/error.h    Fri Feb 19 08:42:32 1993
  335. --- sh03/error.h    Wed Feb 17 04:27:32 1993
  336. ***************
  337. *** 108,113 ****
  338. --- 108,115 ----
  339.    */
  340.   
  341.   #ifdef BSD
  342. + #ifndef __MINT__
  343.   #define setjmp(jmploc)    _setjmp(jmploc)
  344.   #define longjmp(jmploc, val)    _longjmp(jmploc, val)
  345.   #endif
  346. + #endif
  347. diff --context --recursive --new-file bsd-sh/eval.c sh03/eval.c
  348. *** bsd-sh/eval.c    Fri Feb 19 08:42:40 1993
  349. --- sh03/eval.c    Sat May 22 00:41:46 1993
  350. ***************
  351. *** 899,904 ****
  352. --- 899,907 ----
  353.       return ret;
  354.   }
  355.   
  356. + falsecmd(argc, argv) char **argv; {
  357. +     return 1;
  358. + }
  359.   
  360.   truecmd(argc, argv)  char **argv; {
  361.       return 0;
  362. diff --context --recursive --new-file bsd-sh/exec.c sh03/exec.c
  363. *** bsd-sh/exec.c    Fri Feb 19 08:42:56 1993
  364. --- sh03/exec.c    Wed Feb 17 06:13:50 1993
  365. ***************
  366. *** 69,74 ****
  367. --- 69,80 ----
  368.   #include <fcntl.h>
  369.   #include <errno.h>
  370.   
  371. + #ifdef __MINT__
  372. + /* Defines order in which to look for executable program suffixes */
  373. + static const char *const suffixes[] = {
  374. +     "", ".ttp", ".tos", ".prg", 0
  375. + };
  376. + #endif
  377.   
  378.   #define CMDTABLESIZE 31        /* should be prime */
  379.   #define ARB 1            /* actual size determined at run time */
  380. ***************
  381. *** 150,164 ****
  382.       do {
  383.           execve(cmd, argv, envp);
  384.       } while (errno == EINTR);
  385. ! #else
  386.       execve(cmd, argv, envp);
  387. ! #endif
  388.       e = errno;
  389.       if (e == ENOEXEC) {
  390.           initshellproc();
  391.           setinputfile(cmd, 0);
  392.           commandname = arg0 = savestr(argv[0]);
  393. ! #ifndef BSD
  394.           pgetc(); pungetc();        /* fill up input buffer */
  395.           p = parsenextc;
  396.           if (parsenleft > 2 && p[0] == '#' && p[1] == '!') {
  397. --- 156,187 ----
  398.       do {
  399.           execve(cmd, argv, envp);
  400.       } while (errno == EINTR);
  401. ! #else /* !SYSV */
  402. ! #ifdef __MINT__
  403. !     {
  404. !         const char *const *suffix;
  405. !         long len = strlen(cmd);
  406. ! 
  407. !         char *xcmd = alloca(len+5);
  408. !         strcpy(xcmd,cmd);
  409. ! 
  410. !         for (suffix = suffixes; *suffix; suffix++) {
  411. !             strcpy(xcmd + len, *suffix);
  412. !             execve(xcmd, argv, envp);
  413. !             
  414. !             if (errno == ENOEXEC) break;
  415. !         } 
  416. !     }
  417. ! #else /* !__MINT__, !SYSV */
  418.       execve(cmd, argv, envp);
  419. ! #endif /* !__MINT__ */
  420. ! #endif /* !SYSV */
  421.       e = errno;
  422.       if (e == ENOEXEC) {
  423.           initshellproc();
  424.           setinputfile(cmd, 0);
  425.           commandname = arg0 = savestr(argv[0]);
  426. ! #if defined(__MINT__) || !defined(BSD)
  427.           pgetc(); pungetc();        /* fill up input buffer */
  428.           p = parsenextc;
  429.           if (parsenleft > 2 && p[0] == '#' && p[1] == '!') {
  430. ***************
  431. *** 174,180 ****
  432.   }
  433.   
  434.   
  435. ! #ifndef BSD
  436.   /*
  437.    * Execute an interpreter introduced by "#!", for systems where this
  438.    * feature has not been built into the kernel.  If the interpreter is
  439. --- 197,203 ----
  440.   }
  441.   
  442.   
  443. ! #if defined(__MINT__) || !defined(BSD) 
  444.   /*
  445.    * Execute an interpreter introduced by "#!", for systems where this
  446.    * feature has not been built into the kernel.  If the interpreter is
  447. ***************
  448. *** 212,223 ****
  449.               goto bad;
  450.           if ((c = *inp++) == '\n')
  451.               break;
  452.           if (ap == &newargs[NEWARGS])
  453.   bad:          error("Bad #! line");
  454.           STARTSTACKSTR(outp);
  455.           do {
  456.               STPUTC(c, outp);
  457. !         } while (--n >= 0 && (c = *inp++) != ' ' && c != '\t' && c != '\n');
  458.           STPUTC('\0', outp);
  459.           n++, inp--;
  460.           *ap++ = grabstackstr(outp);
  461. --- 235,255 ----
  462.               goto bad;
  463.           if ((c = *inp++) == '\n')
  464.               break;
  465. + #ifdef __MINT__
  466. +         if (c == '\r')
  467. +             break;
  468. + #endif
  469.           if (ap == &newargs[NEWARGS])
  470.   bad:          error("Bad #! line");
  471.           STARTSTACKSTR(outp);
  472.           do {
  473.               STPUTC(c, outp);
  474. !         } 
  475. !         while (--n >= 0 && (c = *inp++) != ' ' && c != '\t' 
  476. ! #ifdef __MINT__
  477. !             && c != '\r'
  478. ! #endif
  479. !             && c != '\n');
  480.           STPUTC('\0', outp);
  481.           n++, inp--;
  482.           *ap++ = grabstackstr(outp);
  483. ***************
  484. *** 459,473 ****
  485.               TRACE(("searchexec \"%s\": no change\n", name));
  486.               goto success;
  487.           }
  488.           while (stat(fullname, &statb) < 0) {
  489. ! #ifdef SYSV
  490.               if (errno == EINTR)
  491.                   continue;
  492. ! #endif
  493.               if (errno != ENOENT && errno != ENOTDIR)
  494.                   e = errno;
  495.               goto loop;
  496.           }
  497.           e = EACCES;    /* if we fail, this will be the error */
  498.           if ((statb.st_mode & S_IFMT) != S_IFREG)
  499.               goto loop;
  500. --- 491,525 ----
  501.               TRACE(("searchexec \"%s\": no change\n", name));
  502.               goto success;
  503.           }
  504. + #ifdef __MINT__
  505. +         {
  506. +             const char *const *suffix;
  507. +             long len = strlen(fullname);
  508. + 
  509. +             char *xcmd = alloca(len+5);
  510. +             strcpy(xcmd,fullname);
  511. + 
  512. +             for (suffix = suffixes; *suffix; suffix++) {
  513. +                 strcpy(xcmd + len, *suffix);
  514. +                 if (stat(xcmd, &statb) >= 0)
  515. +                     break;
  516. +             } 
  517. +             
  518. +             if (*suffix == 0)
  519. +                 /* All suffixes tried to no avail */
  520. +                 goto loop;
  521. +         }
  522. + #else /* !__MINT__*/
  523.           while (stat(fullname, &statb) < 0) {
  524. ! # ifdef SYSV
  525.               if (errno == EINTR)
  526.                   continue;
  527. ! # endif
  528.               if (errno != ENOENT && errno != ENOTDIR)
  529.                   e = errno;
  530.               goto loop;
  531.           }
  532. + #endif /* !__MINT__ */
  533.           e = EACCES;    /* if we fail, this will be the error */
  534.           if ((statb.st_mode & S_IFMT) != S_IFREG)
  535.               goto loop;
  536. diff --context --recursive --new-file bsd-sh/expand.c sh03/expand.c
  537. *** bsd-sh/expand.c    Fri Feb 19 08:43:16 1993
  538. --- sh03/expand.c    Sat May 22 00:44:06 1993
  539. ***************
  540. *** 286,298 ****
  541. --- 286,306 ----
  542.               in.nleft = i - 1;
  543.           }
  544.           lastc = *p++;
  545. + #ifdef __MINT__
  546. +         if (lastc != '\0' && lastc != '\r') {
  547. + #else
  548.           if (lastc != '\0') {
  549. + #endif
  550.               if (full && syntax[lastc] == CCTL)
  551.                   STPUTC(CTLESC, dest);
  552.               STPUTC(lastc, dest);
  553.           }
  554.       }
  555. + #ifdef __MINT__
  556. +     if (lastc == '\n' || lastc == '\r') {
  557. + #else
  558.       if (lastc == '\n') {
  559. + #endif
  560.           STUNPUTC(dest);
  561.       }
  562.       if (in.fd >= 0)
  563. ***************
  564. *** 300,306 ****
  565.       if (in.buf)
  566.           ckfree(in.buf);
  567.       if (in.jp)
  568. !         waitforjob(in.jp);
  569.       if (quoted == 0)
  570.           recordregion(startloc, dest - stackblock(), 0);
  571.       TRACE(("evalbackq: size=%d: \"%.*s\"\n",
  572. --- 308,314 ----
  573.       if (in.buf)
  574.           ckfree(in.buf);
  575.       if (in.jp)
  576. !         exitstatus = waitforjob(in.jp);
  577.       if (quoted == 0)
  578.           recordregion(startloc, dest - stackblock(), 0);
  579.       TRACE(("evalbackq: size=%d: \"%.*s\"\n",
  580. ***************
  581. *** 499,505 ****
  582.       case '*':
  583.           sep = ' ';
  584.   allargs:
  585. !         syntax = quoted? DQSYNTAX : BASESYNTAX;
  586.           for (ap = shellparam.p ; (p = *ap++) != NULL ; ) {
  587.               /* should insert CTLESC characters */
  588.               while (*p) {
  589. --- 507,515 ----
  590.       case '*':
  591.           sep = ' ';
  592.   allargs:
  593. !         /* Only emit CTLESC if we will do further processing,
  594. !            i.e. if allow_split is set.  */
  595. !         syntax = quoted && allow_split ? DQSYNTAX : BASESYNTAX;
  596.           for (ap = shellparam.p ; (p = *ap++) != NULL ; ) {
  597.               /* should insert CTLESC characters */
  598.               while (*p) {
  599. ***************
  600. *** 514,520 ****
  601.       case '0':
  602.           p = arg0;
  603.   string:
  604. !         syntax = quoted? DQSYNTAX : BASESYNTAX;
  605.           while (*p) {
  606.               if (syntax[*p] == CCTL)
  607.                   STPUTC(CTLESC, expdest);
  608. --- 524,532 ----
  609.       case '0':
  610.           p = arg0;
  611.   string:
  612. !         /* Only emit CTLESC if we will do further processing,
  613. !            i.e. if allow_split is set.  */
  614. !         syntax = quoted && allow_split ? DQSYNTAX : BASESYNTAX;
  615.           while (*p) {
  616.               if (syntax[*p] == CCTL)
  617.                   STPUTC(CTLESC, expdest);
  618. ***************
  619. *** 1095,1101 ****
  620.       argbackq = pattern->narg.backquote;
  621.       STARTSTACKSTR(expdest);
  622.       ifslastp = NULL;
  623. !     argstr(pattern->narg.text, 0);
  624.       STPUTC('\0', expdest);
  625.       p = grabstackstr(expdest);
  626.       result = patmatch(p, val);
  627. --- 1107,1115 ----
  628.       argbackq = pattern->narg.backquote;
  629.       STARTSTACKSTR(expdest);
  630.       ifslastp = NULL;
  631. !     /* Preserve any CTLESC characters inserted previously, so that
  632. !        we won't expand reg exps which are inside strings.  */
  633. !     argstr(pattern->narg.text, 1);
  634.       STPUTC('\0', expdest);
  635.       p = grabstackstr(expdest);
  636.       result = patmatch(p, val);
  637. diff --context --recursive --new-file bsd-sh/input.c sh03/input.c
  638. *** bsd-sh/input.c    Fri Feb 19 08:43:34 1993
  639. --- sh03/input.c    Sun Mar 21 15:15:42 1993
  640. ***************
  641. *** 181,200 ****
  642. --- 181,211 ----
  643.       p = parsenextc = parsefile->buf;
  644.       i = read(parsefile->fd, p, BUFSIZ);
  645.       if (i <= 0) {
  646. + #ifndef __MINT__
  647.                   if (i < 0) {
  648. + #endif
  649.                           if (errno == EINTR)
  650.                                   goto retry;
  651. + #ifndef __MINT__
  652.                           if (parsefile->fd == 0 && errno == EWOULDBLOCK) {
  653.                                   int flags = fcntl(0, F_GETFL, 0);
  654.                                   if (flags >= 0 && flags & O_NONBLOCK) {
  655.                                           flags &=~ O_NONBLOCK;
  656. + #else
  657. +                         if (parsefile->fd == 0 && i == 0) {
  658. +                                 int flags = fcntl(0, F_GETFL, 0);
  659. +                                 if (flags >= 0 && flags & O_NDELAY) {
  660. +                                         flags &=~ O_NDELAY;
  661. + #endif
  662.                                           if (fcntl(0, F_SETFL, flags) >= 0) {
  663.                           out2str("sh: turning off NDELAY mode\n");
  664.                                                   goto retry;
  665.                                           }
  666.                                   }
  667.                           }
  668. + #ifndef __MINT__
  669.                   }
  670. + #endif
  671.                   parsenleft = EOF_NLEFT;
  672.                   return PEOF;
  673.       }
  674. ***************
  675. *** 202,207 ****
  676. --- 213,224 ----
  677.   
  678.       /* delete nul characters */
  679.       for (;;) {
  680. + #ifdef __MINT__
  681. +         if (*p == '\r') {
  682. +             p++;
  683. +             break;
  684. +         }
  685. + #endif
  686.           if (*p++ == '\0')
  687.               break;
  688.           if (--i <= 0)
  689. ***************
  690. *** 209,215 ****
  691. --- 226,236 ----
  692.       }
  693.       q = p - 1;
  694.       while (--i > 0) {
  695. + #ifdef __MINT__
  696. +         if (*p != '\0' && *p != '\r')
  697. + #else
  698.           if (*p != '\0')
  699. + #endif
  700.               *q++ = *p;
  701.           p++;
  702.       }
  703. diff --context --recursive --new-file bsd-sh/jobs.c sh03/jobs.c
  704. *** bsd-sh/jobs.c    Fri Feb 19 08:43:54 1993
  705. --- sh03/jobs.c    Sat May 22 00:44:12 1993
  706. ***************
  707. *** 56,61 ****
  708. --- 56,62 ----
  709.   #include "memalloc.h"
  710.   #include "error.h"
  711.   #include "mystring.h"
  712. + #include "redir.h"
  713.   #include <fcntl.h>
  714.   #include <signal.h>
  715.   #include <errno.h>
  716. ***************
  717. *** 509,514 ****
  718. --- 510,518 ----
  719.       {
  720.       int pid;
  721.       int pgrp;
  722. + #ifdef __MINT__
  723. +     int fd;
  724. + #endif
  725.   
  726.       TRACE(("forkshell(%%%d, 0x%x, %d) called\n", jp - jobtab, (int)n, mode));
  727.       INTOFF;
  728. ***************
  729. *** 550,569 ****
  730.           } else if (mode == FORK_BG) {
  731.               ignoresig(SIGINT);
  732.               ignoresig(SIGQUIT);
  733. !             if (jp == NULL || jp->nprocs == 0) {
  734.                   close(0);
  735.                   if (open("/dev/null", O_RDONLY) != 0)
  736.                       error("Can't open /dev/null");
  737.               }
  738.           }
  739.   #else
  740.           if (mode == FORK_BG) {
  741.               ignoresig(SIGINT);
  742.               ignoresig(SIGQUIT);
  743. !             if (jp == NULL || jp->nprocs == 0) {
  744.                   close(0);
  745.                   if (open("/dev/null", O_RDONLY) != 0)
  746.                       error("Can't open /dev/null");
  747.               }
  748.           }
  749.   #endif
  750. --- 554,593 ----
  751.           } else if (mode == FORK_BG) {
  752.               ignoresig(SIGINT);
  753.               ignoresig(SIGQUIT);
  754. !             if ((jp == NULL || jp->nprocs == 0)
  755. !                 && ! fd0_redirected_p ()) {
  756.                   close(0);
  757. + #ifndef __MINT__
  758.                   if (open("/dev/null", O_RDONLY) != 0)
  759.                       error("Can't open /dev/null");
  760. + #else
  761. +                 if ((fd = open("/dev/null", O_RDONLY)) < 0)
  762. +                     error("Can't open /dev/null");
  763. +                 else {
  764. +                     dup2(fd, 0);
  765. +                     close(fd);
  766. +                 }
  767. + #endif
  768.               }
  769.           }
  770.   #else
  771.           if (mode == FORK_BG) {
  772.               ignoresig(SIGINT);
  773.               ignoresig(SIGQUIT);
  774. !             if ((jp == NULL || jp->nprocs == 0)
  775. !                 && ! fd0_redirected_p ()) {
  776.                   close(0);
  777. + #ifndef __MINT__
  778.                   if (open("/dev/null", O_RDONLY) != 0)
  779.                       error("Can't open /dev/null");
  780. + #else
  781. +                 if ((fd = open("/dev/null", O_RDONLY)) < 0)
  782. +                     error("Can't open /dev/null");
  783. +                 else {
  784. +                     dup2(fd, 0);
  785. +                     close(fd);
  786. +                 }
  787. + #endif
  788.               }
  789.           }
  790.   #endif
  791. diff --context --recursive --new-file bsd-sh/main.c sh03/main.c
  792. *** bsd-sh/main.c    Fri Feb 19 08:44:22 1993
  793. --- sh03/main.c    Mon Mar 22 21:10:02 1993
  794. ***************
  795. *** 65,70 ****
  796. --- 65,74 ----
  797.   #include "init.h"
  798.   #include "mystring.h"
  799.   
  800. + #ifdef __MINT__
  801. + long _stksize = 20*1024L;
  802. + #endif
  803. + 
  804.   #define PROFILE 0
  805.   
  806.   int rootpid;
  807. ***************
  808. *** 146,157 ****
  809. --- 150,173 ----
  810.       init();
  811.       setstackmark(&smark);
  812.       procargs(argc, argv);
  813. + #ifdef __MINT__
  814. +     /* under MiNT, we are also a login shell if we've been started
  815. +      * from the desktop with no arguments
  816. +      * hohmuth 22 Mar 1993
  817. +      */
  818. +     if (!argv[0] || (!argv[0][0] && !argv[1]))
  819. +         argv[0] = "-sh";
  820. + #endif
  821.       if (argv[0] && argv[0][0] == '-') {
  822.           state = 1;
  823.           read_profile("/etc/profile");
  824.   state1:
  825.           state = 2;
  826. + #ifdef DOSFS
  827. +         read_profile("profile.sh");
  828. + #else
  829.           read_profile(".profile");
  830. + #endif
  831.       } else if ((sflag || minusc) && (shinit = getenv("SHINIT")) != NULL) {
  832.           state = 2;
  833.           evalstring(shinit);
  834. diff --context --recursive --new-file bsd-sh/miscbltin.c sh03/miscbltin.c
  835. *** bsd-sh/miscbltin.c    Fri Feb 19 08:44:44 1993
  836. --- sh03/miscbltin.c    Sun Mar 21 15:03:18 1993
  837. ***************
  838. *** 99,105 ****
  839. --- 99,109 ----
  840.               status = 1;
  841.               break;
  842.           }
  843. + #ifdef __MINT__
  844. +         if (c == '\0' || c == '\r')
  845. + #else
  846.           if (c == '\0')
  847. + #endif
  848.               continue;
  849.           if (backslash) {
  850.               backslash = 0;
  851. diff --context --recursive --new-file bsd-sh/mkbuiltins sh03/mkbuiltins
  852. *** bsd-sh/mkbuiltins    Fri Feb 19 08:44:48 1993
  853. --- sh03/mkbuiltins    Wed Mar 10 08:33:22 1993
  854. ***************
  855. *** 41,47 ****
  856.   if grep '^#define JOBS[     ]*1' shell.h > /dev/null
  857.   then    havejobs=1
  858.   fi
  859. ! exec > obj/builtins.c
  860.   cat <<\!
  861.   /*
  862.    * This file was generated by the mkbuiltins program.
  863. --- 41,47 ----
  864.   if grep '^#define JOBS[     ]*1' shell.h > /dev/null
  865.   then    havejobs=1
  866.   fi
  867. ! exec > builtins.c
  868.   cat <<\!
  869.   /*
  870.    * This file was generated by the mkbuiltins program.
  871. ***************
  872. *** 66,72 ****
  873.   echo '    NULL, 0
  874.   };'
  875.   
  876. ! exec > obj/builtins.h
  877.   cat <<\!
  878.   /*
  879.    * This file was generated by the mkbuiltins program.
  880. --- 66,72 ----
  881.   echo '    NULL, 0
  882.   };'
  883.   
  884. ! exec > builtins.h
  885.   cat <<\!
  886.   /*
  887.    * This file was generated by the mkbuiltins program.
  888. diff --context --recursive --new-file bsd-sh/parser.c sh03/parser.c
  889. *** bsd-sh/parser.c    Fri Feb 19 08:46:26 1993
  890. --- sh03/parser.c    Sat May 22 00:44:22 1993
  891. ***************
  892. *** 99,105 ****
  893.   STATIC union node *andor __P((void));
  894.   STATIC union node *pipeline __P((void));
  895.   STATIC union node *command __P((void));
  896. ! STATIC union node *simplecmd __P((void));
  897.   STATIC void parsefname __P((void));
  898.   STATIC void parseheredoc __P((void));
  899.   STATIC int readtoken __P((void));
  900. --- 99,105 ----
  901.   STATIC union node *andor __P((void));
  902.   STATIC union node *pipeline __P((void));
  903.   STATIC union node *command __P((void));
  904. ! STATIC union node *simplecmd __P((union node **, union node *));
  905.   STATIC void parsefname __P((void));
  906.   STATIC void parseheredoc __P((void));
  907.   STATIC int readtoken __P((void));
  908. ***************
  909. *** 264,269 ****
  910. --- 264,279 ----
  911.       int t;
  912.   
  913.       checkkwd = 2;
  914. +     redir = 0;
  915. +     rpp = &redir;
  916. +     /* Check for redirection which may precede command */
  917. +     while (readtoken() == TREDIR) {
  918. +         *rpp = n2 = redirnode;
  919. +         rpp = &n2->nfile.next;
  920. +         parsefname();
  921. +     }
  922. +     tokpushback++;
  923. + 
  924.       switch (readtoken()) {
  925.       case TIF:
  926.           n1 = (union node *)stalloc(sizeof (struct nif));
  927. ***************
  928. *** 326,331 ****
  929. --- 336,345 ----
  930.               }
  931.               *app = NULL;
  932.               n1->nfor.args = ap;
  933. +             /* A newline or semicolon is required here to end
  934. +                the list.  */
  935. +             if (lasttoken != TNL && lasttoken != TSEMI)
  936. +                 synexpect(-1);
  937.           } else {
  938.   #ifndef GDB_HACK
  939.               static const char argvars[5] = {CTLVAR, VSNORMAL|VSQUOTE,
  940. ***************
  941. *** 337,345 ****
  942.               n2->narg.backquote = NULL;
  943.               n2->narg.next = NULL;
  944.               n1->nfor.args = n2;
  945.           }
  946. -         if (lasttoken != TNL && lasttoken != TSEMI)
  947. -             synexpect(-1);
  948.           checkkwd = 2;
  949.           if ((t = readtoken()) == TDO)
  950.               t = TDONE;
  951. --- 351,361 ----
  952.               n2->narg.backquote = NULL;
  953.               n2->narg.next = NULL;
  954.               n1->nfor.args = n2;
  955. +             /* A newline or semicolon is optional here. Anything
  956. +                else gets pushed back so we can read it again.  */
  957. +             if (lasttoken != TNL && lasttoken != TSEMI)
  958. +                 tokpushback++;
  959.           }
  960.           checkkwd = 2;
  961.           if ((t = readtoken()) == TDO)
  962.               t = TDONE;
  963. ***************
  964. *** 411,426 ****
  965.               synexpect(TEND);
  966.           checkkwd = 1;
  967.           break;
  968.       case TWORD:
  969. -     case TREDIR:
  970.           tokpushback++;
  971. !         return simplecmd();
  972.       default:
  973.           synexpect(-1);
  974.       }
  975.   
  976.       /* Now check for redirection which may follow command */
  977. -     rpp = &redir;
  978.       while (readtoken() == TREDIR) {
  979.           *rpp = n2 = redirnode;
  980.           rpp = &n2->nfile.next;
  981. --- 427,442 ----
  982.               synexpect(TEND);
  983.           checkkwd = 1;
  984.           break;
  985. +     /* Handle an empty command like other simple commands.  */
  986. +     case TNL:
  987.       case TWORD:
  988.           tokpushback++;
  989. !         return simplecmd(rpp, redir);
  990.       default:
  991.           synexpect(-1);
  992.       }
  993.   
  994.       /* Now check for redirection which may follow command */
  995.       while (readtoken() == TREDIR) {
  996.           *rpp = n2 = redirnode;
  997.           rpp = &n2->nfile.next;
  998. ***************
  999. *** 442,455 ****
  1000.   
  1001.   
  1002.   STATIC union node *
  1003. ! simplecmd() {
  1004.       union node *args, **app;
  1005. !     union node *redir, **rpp;
  1006.       union node *n;
  1007.   
  1008.       args = NULL;
  1009.       app = &args;
  1010. !     rpp = &redir;
  1011.       for (;;) {
  1012.           if (readtoken() == TWORD) {
  1013.               n = (union node *)stalloc(sizeof (struct narg));
  1014. --- 458,481 ----
  1015.   
  1016.   
  1017.   STATIC union node *
  1018. ! simplecmd(rpp, redir)
  1019. !     union node **rpp, *redir;
  1020. !     {
  1021.       union node *args, **app;
  1022. !     union node **orig_rpp = rpp;
  1023.       union node *n;
  1024.   
  1025. +     /* If we don't have any redirections already, then we must reset
  1026. +        rpp to be the address of the local redir variable.  */
  1027. +     if (redir == 0)
  1028. +         rpp = &redir;
  1029. + 
  1030.       args = NULL;
  1031.       app = &args;
  1032. !     /* We save the incoming value, because we need this for shell
  1033. !        functions.  There can not be a redirect or an argument between
  1034. !        the function name and the open parenthesis.  */
  1035. !     orig_rpp = rpp;
  1036.       for (;;) {
  1037.           if (readtoken() == TWORD) {
  1038.               n = (union node *)stalloc(sizeof (struct narg));
  1039. ***************
  1040. *** 463,469 ****
  1041.               rpp = &n->nfile.next;
  1042.               parsefname();    /* read name of redirection file */
  1043.           } else if (lasttoken == TLP && app == &args->narg.next
  1044. !                         && rpp == &redir) {
  1045.               /* We have a function */
  1046.               if (readtoken() != TRP)
  1047.                   synexpect(TRP);
  1048. --- 489,495 ----
  1049.               rpp = &n->nfile.next;
  1050.               parsefname();    /* read name of redirection file */
  1051.           } else if (lasttoken == TLP && app == &args->narg.next
  1052. !                         && rpp == orig_rpp) {
  1053.               /* We have a function */
  1054.               if (readtoken() != TRP)
  1055.                   synexpect(TRP);
  1056. ***************
  1057. *** 836,847 ****
  1058.                   }
  1059.                   break;
  1060.               case CBQUOTE:    /* '`' */
  1061. -                 if (parsebackquote && syntax == BASESYNTAX) {
  1062. -                     if (out == stackblock())
  1063. -                         return lasttoken = TENDBQUOTE;
  1064. -                     else
  1065. -                         goto endword;    /* exit outer loop */
  1066. -                 }
  1067.                   PARSEBACKQOLD();
  1068.                   break;
  1069.               case CEOF:
  1070. --- 862,867 ----
  1071. ***************
  1072. *** 855,861 ****
  1073.           }
  1074.       }
  1075.   endword:
  1076. !     if (syntax != BASESYNTAX && eofmark == NULL)
  1077.           synerror("Unterminated quoted string");
  1078.       if (varnest != 0) {
  1079.           startlinno = plinno;
  1080. --- 875,881 ----
  1081.           }
  1082.       }
  1083.   endword:
  1084. !     if (syntax != BASESYNTAX && ! parsebackquote && eofmark == NULL)
  1085.           synerror("Unterminated quoted string");
  1086.       if (varnest != 0) {
  1087.           startlinno = plinno;
  1088. ***************
  1089. *** 1048,1054 ****
  1090.       struct jmploc jmploc;
  1091.       struct jmploc *volatile savehandler;
  1092.       int savelen;
  1093. -     int t;
  1094.   
  1095.       savepbq = parsebackquote;
  1096.       if (setjmp(jmploc.loc)) {
  1097. --- 1068,1073 ----
  1098. ***************
  1099. *** 1068,1073 ****
  1100. --- 1087,1119 ----
  1101.       savehandler = handler;
  1102.       handler = &jmploc;
  1103.       INTON;
  1104. +     if (oldstyle) {
  1105. +         /* We must read until the closing backquote, giving special
  1106. +            treatment to some slashes, and then push the string and
  1107. +            reread it as input, interpreting it normally.  */
  1108. +         register char *out;
  1109. +         register c;
  1110. +         int savelen;
  1111. +         char *str;
  1112. + 
  1113. +         STARTSTACKSTR(out);
  1114. +         while ((c = pgetc ()) != '`') {
  1115. +             if (c == '\\') {
  1116. +                 c = pgetc ();
  1117. +                 if (c != '\\' && c != '`' && c != '$'
  1118. +                     && (!dblquote || c != '"'))
  1119. +                     STPUTC('\\', out);
  1120. +             }
  1121. +             STPUTC(c, out);
  1122. +         }
  1123. +         STPUTC('\0', out);
  1124. +         savelen = out - stackblock();
  1125. +         if (savelen > 0) {
  1126. +             str = ckmalloc(savelen);
  1127. +             bcopy(stackblock(), str, savelen);
  1128. +         }
  1129. +         setinputstring(str, 1);
  1130. +     }
  1131.       nlpp = &bqlist;
  1132.       while (*nlpp)
  1133.           nlpp = &(*nlpp)->next;
  1134. ***************
  1135. *** 1075,1084 ****
  1136.       (*nlpp)->next = NULL;
  1137.       parsebackquote = oldstyle;
  1138.       n = list(0);
  1139. !     t = oldstyle? TENDBQUOTE : TRP;
  1140. !     if (readtoken() != t)
  1141. !         synexpect(t);
  1142.       (*nlpp)->n = n;
  1143.       while (stackblocksize() <= savelen)
  1144.           growstackblock();
  1145.       STARTSTACKSTR(out);
  1146. --- 1121,1132 ----
  1147.       (*nlpp)->next = NULL;
  1148.       parsebackquote = oldstyle;
  1149.       n = list(0);
  1150. !     if (!oldstyle && (readtoken() != TRP))
  1151. !         synexpect(TRP);
  1152.       (*nlpp)->n = n;
  1153. +     /* Start reading from old file again.  */
  1154. +     if (oldstyle)
  1155. +         popfile();
  1156.       while (stackblocksize() <= savelen)
  1157.           growstackblock();
  1158.       STARTSTACKSTR(out);
  1159. diff --context --recursive --new-file bsd-sh/redir.c sh03/redir.c
  1160. *** bsd-sh/redir.c    Fri Feb 19 08:46:40 1993
  1161. --- sh03/redir.c    Sat May 22 00:44:30 1993
  1162. ***************
  1163. *** 68,73 ****
  1164. --- 68,77 ----
  1165.   
  1166.   MKINIT struct redirtab *redirlist;
  1167.   
  1168. + /* We keep track of whether or not fd0 has been redirected.  This is for
  1169. +    background commands, where we want to redirect fd0 to /dev/null only
  1170. +    if it hasn't already been redirected.  */
  1171. + int fd0_redirected = 0;
  1172.   
  1173.   #ifdef __STDC__
  1174.   STATIC void openredirect(union node *, char *);
  1175. ***************
  1176. *** 122,127 ****
  1177. --- 126,133 ----
  1178.           } else {
  1179.               close(fd);
  1180.           }
  1181. +         if (fd == 0)
  1182. +             fd0_redirected++;
  1183.           openredirect(n, memory);
  1184.       }
  1185.       if (memory[1])
  1186. ***************
  1187. *** 255,260 ****
  1188. --- 261,268 ----
  1189.   
  1190.       for (i = 0 ; i < 10 ; i++) {
  1191.           if (rp->renamed[i] != EMPTY) {
  1192. +             if (i == 0)
  1193. +                 fd0_redirected--;
  1194.               close(i);
  1195.               if (rp->renamed[i] >= 0) {
  1196.                   copyfd(rp->renamed[i], i);
  1197. ***************
  1198. *** 348,350 ****
  1199. --- 356,364 ----
  1200.       return newfd;
  1201.   #endif
  1202.   }
  1203. + 
  1204. + /* Return true if fd 0 has already been redirected at least once.  */
  1205. + int
  1206. + fd0_redirected_p () {
  1207. +     return fd0_redirected != 0;
  1208. + }
  1209. diff --context --recursive --new-file bsd-sh/redir.h sh03/redir.h
  1210. *** bsd-sh/redir.h    Fri Feb 19 08:46:44 1993
  1211. --- sh03/redir.h    Sat May 22 00:44:34 1993
  1212. ***************
  1213. *** 46,54 ****
  1214. --- 46,56 ----
  1215.   void popredir(void);
  1216.   void clearredir(void);
  1217.   int copyfd(int, int);
  1218. + int fd0_redirected_p(void);
  1219.   #else
  1220.   void redirect();
  1221.   void popredir();
  1222.   void clearredir();
  1223.   int copyfd();
  1224. + int fd0_redirected_p();
  1225.   #endif
  1226. diff --context --recursive --new-file bsd-sh/shell.h sh03/shell.h
  1227. *** bsd-sh/shell.h    Fri Feb 19 08:47:10 1993
  1228. --- sh03/shell.h    Sun Mar 14 07:10:46 1993
  1229. ***************
  1230. *** 57,66 ****
  1231.   #define JOBS 1
  1232.   #define SYMLINKS 1
  1233.   #define DIRENT 1
  1234. ! #define UDIR 0
  1235.   #define ATTY 0
  1236.   #define BSD
  1237. ! #define DEBUG 1
  1238.   
  1239.   #ifdef __STDC__
  1240.   typedef void *pointer;
  1241. --- 57,66 ----
  1242.   #define JOBS 1
  1243.   #define SYMLINKS 1
  1244.   #define DIRENT 1
  1245. ! #define UDIR 1
  1246.   #define ATTY 0
  1247.   #define BSD
  1248. ! #define DEBUG 0
  1249.   
  1250.   #ifdef __STDC__
  1251.   typedef void *pointer;
  1252. diff --context --recursive --new-file bsd-sh/sys/cdefs.h sh03/sys/cdefs.h
  1253. *** bsd-sh/sys/cdefs.h
  1254. --- sh03/sys/cdefs.h    Tue Feb 16 00:00:00 1993
  1255. ***************
  1256. *** 0 ****
  1257. --- 1,15 ----
  1258. + #ifndef cdefs_h
  1259. + #define cdefs_h
  1260. + #include <stddef.h>
  1261. + #include <sys/types.h>
  1262. + #include <signal.h>
  1263. + 
  1264. + typedef void *sig_t;
  1265. + 
  1266. + #ifdef __STDC__
  1267. + # define __P(x) x
  1268. + #else
  1269. + # define __P(x) ()
  1270. + #endif
  1271. + 
  1272. + #endif
  1273. diff --context --recursive --new-file bsd-sh/var.c sh03/var.c
  1274. *** bsd-sh/var.c    Fri Feb 19 08:48:00 1993
  1275. --- sh03/var.c    Wed Feb 17 07:12:18 1993
  1276. ***************
  1277. *** 81,87 ****
  1278.   struct var vterm;
  1279.   #endif
  1280.   
  1281. ! const struct varinit varinit[] = {
  1282.   #if ATTY
  1283.       {&vatty,    VSTRFIXED|VTEXTFIXED|VUNSET,    "ATTY="},
  1284.   #endif
  1285. --- 81,90 ----
  1286.   struct var vterm;
  1287.   #endif
  1288.   
  1289. ! #ifndef __MBASE__
  1290. ! const 
  1291. ! #endif
  1292. ! struct varinit varinit[] = {
  1293.   #if ATTY
  1294.       {&vatty,    VSTRFIXED|VTEXTFIXED|VUNSET,    "ATTY="},
  1295.   #endif
  1296.